home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C128Software / FONT-SHOP---PLUS / SOURCE CODE < prev    next >
Texas Instruments Calculator Program  |  2019-04-13  |  2.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Texas Instruments Calculator Program (executable/tiCalcProgram).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Texas Instruments Calculator Program (executable/tiCalcProgram) magic Unsupported
100% file Commodore C128 BASIC program, offset 0x1c13, line 5, token (0x97) POKE 58,, offset 0x1c31, line 10, token (0x86) default (weak)
99% file SVr3 curses screen image, big-endian default (weak)
98% file data default
100% TrID Commodore 128 BASIC V7.0 program default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 1c 13 1c 05 00 97 35 | 38 2c d1 28 22 44 30 22 |.......5|8,.("D0"|
|00000010| 29 3a 9c 00 31 1c 0a 00 | 86 41 41 28 39 29 2c 43 |):..1...|.AA(9),C|
|00000020| 53 24 28 38 29 3a 41 41 | 28 39 29 b2 35 37 33 34 |S$(8):AA|(9).5734|
|00000030| 34 00 55 1c 0b 00 43 53 | 24 28 31 29 b2 22 55 50 |4.U...CS|$(1)."UP|
|00000040| 50 45 52 20 43 41 53 45 | 22 3a 41 41 28 31 29 b2 |PER CASE|":AA(1).|
|00000050| 35 33 32 34 38 00 77 1c | 0c 00 43 53 24 28 32 29 |53248.w.|..CS$(2)|
|00000060| b2 22 47 52 41 50 48 49 | 43 53 22 3a 41 41 28 32 |."GRAPHI|CS":AA(2|
|00000070| 29 b2 35 33 37 36 30 00 | a4 1c 0d 00 43 53 24 28 |).53760.|....CS$(|
|00000080| 33 29 b2 22 52 45 56 45 | 52 53 45 44 20 55 50 50 |3)."REVE|RSED UPP|
|00000090| 45 52 20 43 41 53 45 22 | 3a 41 41 28 33 29 b2 35 |ER CASE"|:AA(3).5|
|000000a0| 34 32 37 32 00 cf 1c 0e | 00 43 53 24 28 34 29 b2 |4272....|.CS$(4).|
|000000b0| 22 52 45 56 45 52 53 45 | 44 20 47 52 41 50 48 49 |"REVERSE|D GRAPHI|
|000000c0| 43 53 22 3a 41 41 28 34 | 29 b2 35 34 37 38 34 00 |CS":AA(4|).54784.|
|000000d0| f3 1c 0f 00 43 53 24 28 | 35 29 b2 22 4c 4f 57 45 |....CS$(|5)."LOWE|
|000000e0| 52 20 43 41 53 45 22 3a | 41 41 28 35 29 b2 35 35 |R CASE":|AA(5).55|
|000000f0| 32 39 36 00 22 1d 10 00 | 43 53 24 28 36 29 b2 22 |296."...|CS$(6)."|
|00000100| 55 50 50 45 52 20 43 41 | 53 45 20 26 20 47 52 41 |UPPER CA|SE & GRA|
|00000110| 50 48 49 43 53 22 3a 41 | 41 28 36 29 b2 35 35 38 |PHICS":A|A(6).558|
|00000120| 30 38 00 4f 1d 11 00 43 | 53 24 28 37 29 b2 22 52 |08.O...C|S$(7)."R|
|00000130| 45 56 45 52 53 45 44 20 | 4c 4f 57 45 52 20 43 41 |EVERSED |LOWER CA|
|00000140| 53 45 22 3a 41 41 28 37 | 29 b2 35 36 33 32 30 00 |SE":AA(7|).56320.|
|00000150| 87 1d 12 00 43 53 24 28 | 38 29 b2 22 52 45 56 45 |....CS$(|8)."REVE|
|00000160| 52 53 45 44 20 55 50 50 | 45 52 20 43 41 53 45 20 |RSED UPP|ER CASE |
|00000170| 26 20 47 52 41 50 48 49 | 43 53 22 3a 41 41 28 38 |& GRAPHI|CS":AA(8|
|00000180| 29 b2 35 36 38 33 32 00 | 05 1e 14 00 43 53 24 b2 |).56832.|....CS$.|
|00000190| 22 20 21 23 24 25 26 27 | 28 29 2b 2d 5c 2a 3a 3b |" !#$%&'|()+-\*:;|
|000001a0| 3d 2c 2e 2f 3c 3e 3f 30 | 31 32 33 34 35 36 37 38 |=,./<>?0|12345678|
|000001b0| 39 40 41 42 43 44 45 46 | 47 48 49 4a 4b 4c 4d 4e |9@ABCDEF|GHIJKLMN|
|000001c0| 4f 50 51 52 53 54 55 56 | 57 58 59 5a c1 c2 c3 c4 |OPQRSTUV|WXYZ....|
|000001d0| c5 c6 c7 c8 c9 ca cb cc | cd ce cf d0 d1 d2 d3 d4 |........|........|
|000001e0| d5 d6 d7 d8 d9 da ab b3 | b1 b2 a3 b7 b8 a2 b9 af |........|........|
|000001f0| a4 df ff b0 ae ac bb a5 | b4 b5 a1 b6 5b 5d bd bc |........|....[]..|
|00000200| be bf aa a7 22 00 39 1e | 64 00 99 22 93 0e 9e 20 |....".9.|d.."... |
|00000210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000220| 20 20 20 20 20 20 20 20 | 20 20 20 d4 48 45 20 c6 | | .HE .|
|00000230| 4f 4e 54 20 d3 48 4f 50 | 22 00 64 1e 69 00 99 22 |ONT .HOP|".d.i.."|
|00000240| 9a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000260| 20 20 42 59 00 93 1e 6a | 00 99 22 96 20 20 20 20 | BY...j|..". |
|00000270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000280| 20 20 20 20 20 20 20 20 | 20 20 d4 4f 4d 20 c2 52 | | .OM .R|
|00000290| 4f 57 4e 00 a4 1e 6e 00 | 99 22 11 11 9f d3 c5 cc |OWN...n.|."......|
|000002a0| c5 c3 d4 3a 00 bf 1e 78 | 00 99 22 05 3c 20 31 20 |...:...x|..".< 1 |
|000002b0| 3e 20 3d 20 cc 4f 41 44 | 20 41 20 c6 4f 4e 54 00 |> = .OAD| A .ONT.|
|000002c0| d9 1e 79 00 99 22 3c 20 | 32 20 3e 20 3d 20 d3 41 |..y.."< |2 > = .A|
|000002d0| 56 45 20 41 20 c6 4f 4e | 54 00 f2 1e 7a 00 99 22 |VE A .ON|T...z.."|
|000002e0| 3c 20 33 20 3e 20 3d 20 | d5 53 45 20 41 20 c6 4f |< 3 > = |.SE A .O|
|000002f0| 4e 54 00 14 1f 7b 00 99 | 22 3c 20 34 20 3e 20 3d |NT...{..|"< 4 > =|
|00000300| 20 d2 45 53 54 4f 52 45 | 20 ce 4f 52 4d 41 4c 20 | .ESTORE| .ORMAL |
|00000310| c6 4f 4e 54 00 31 1f 7c | 00 99 22 3c 20 35 20 3e |.ONT.1.||.."< 5 >|
|00000320| 20 3d 20 c4 49 53 4b 20 | c4 49 52 45 43 54 4f 52 | = .ISK |.IRECTOR|
|00000330| 59 00 47 1f 7d 00 99 3a | 99 c7 28 31 34 32 29 aa |Y.G.}..:|..(142).|
|00000340| 22 9c 22 aa 43 53 24 00 | 61 1f 7e 00 99 3a 99 c7 |".".CS$.|a.~..:..|
|00000350| 28 31 34 32 29 22 99 12 | 22 aa 43 53 24 aa 22 0e |(142)"..|".CS$.".|
|00000360| 22 00 71 1f 7f 00 99 22 | 11 11 0e 9a 22 aa 43 53 |".q...."|....".CS|
|00000370| 24 00 87 1f 80 00 99 3a | 99 22 0e 12 9e 22 aa 43 |$......:|."...".C|
|00000380| 53 24 aa 22 05 07 22 00 | a5 1f 82 00 a1 f9 41 24 |S$."..".|......A$|
|00000390| 3a 41 b2 c5 28 41 24 29 | 3a 8b 41 b3 31 b0 41 b1 |:A..(A$)|:.A.1.A.|
|000003a0| 35 a7 31 33 30 00 c5 1f | 8c 00 91 41 89 31 30 30 |5.130...|...A.100|
|000003b0| 30 2c 32 30 30 30 2c 33 | 30 30 30 2c 34 30 30 30 |0,2000,3|000,4000|
|000003c0| 2c 35 30 30 30 00 ce 1f | 96 00 89 31 30 30 00 ee |,5000...|...100..|
|000003d0| 1f e8 03 99 22 93 99 cc | 4f 41 44 20 41 20 c6 4f |...."...|OAD A .O|
|000003e0| 4e 54 20 46 52 4f 4d 20 | c4 49 53 4b 05 22 00 0f |NT FROM |.ISK."..|
|000003f0| 20 f2 03 99 22 11 11 07 | c5 4e 54 45 52 20 c6 49 | ..."...|.NTER .I|
|00000400| 4c 45 4e 41 4d 45 3a 20 | 22 3b 3a 85 46 49 24 00 |LENAME: |";:.FI$.|
|00000410| 2c 20 fc 03 8b c3 28 46 | 49 24 29 b1 31 36 a7 46 |, ....(F|I$).16.F|
|00000420| 49 24 b2 c8 28 46 49 24 | 2c 31 36 29 00 58 20 06 |I$..(FI$|,16).X .|
|00000430| 04 99 22 11 11 11 11 07 | d3 45 4c 45 43 54 20 4c |..".....|.ELECT L|
|00000440| 4f 43 41 54 49 4f 4e 20 | 46 4f 52 20 46 49 4c 45 |OCATION |FOR FILE|
|00000450| 20 53 54 41 52 54 3a 22 | 00 7e 20 10 04 81 58 b2 | START:"|.~ ...X.|
|00000460| 31 a4 38 3a 99 22 3c 22 | aa c4 28 58 29 aa 22 20 |1.8:."<"|..(X)." |
|00000470| 3e 20 3d 20 22 aa 43 53 | 24 28 58 29 3a 82 00 9d |> = ".CS|$(X):...|
|00000480| 20 1a 04 a1 f9 41 24 3a | 41 b2 c5 28 41 24 29 3a | ....A$:|A..(A$):|
|00000490| 8b 41 b3 31 b0 41 b1 39 | a7 31 30 35 30 00 b0 20 |.A.1.A.9|.1050.. |
|000004a0| 1f 04 99 22 cc 4f 41 44 | 49 4e 47 2e 2e 2e 2e 22 |...".OAD|ING...."|
|000004b0| 00 d1 20 24 04 fe 11 28 | 46 49 24 29 2c 42 31 2c |.. $...(|FI$),B1,|
|000004c0| 50 28 41 41 28 41 29 29 | 3a 8b 44 53 a7 99 44 53 |P(AA(A))|:.DS..DS|
|000004d0| 24 00 da 20 2e 04 89 31 | 30 30 00 f8 20 d0 07 99 |$.. ...1|00.. ...|
|000004e0| 22 93 9a d3 41 56 45 20 | 41 20 c6 4f 4e 54 20 54 |"...AVE |A .ONT T|
|000004f0| 4f 20 c4 49 53 4b 05 22 | 00 19 21 da 07 99 22 11 |O .ISK."|..!...".|
|00000500| 11 07 c5 4e 54 45 52 20 | c6 49 4c 45 4e 41 4d 45 |...NTER |.ILENAME|
|00000510| 3a 20 22 3b 3a 85 46 49 | 24 00 36 21 e4 07 8b c3 |: ";:.FI|$.6!....|
|00000520| 28 46 49 24 29 b1 31 36 | a7 46 49 24 b2 c8 28 46 |(FI$).16|.FI$..(F|
|00000530| 49 24 2c 31 36 29 00 5e | 21 ee 07 99 22 11 11 11 |I$,16).^|!..."...|
|00000540| 11 07 d3 45 4c 45 43 54 | 20 46 49 52 53 54 20 42 |...ELECT| FIRST B|
|00000550| 4c 4f 43 4b 20 4f 46 20 | 53 41 56 45 3a 22 00 84 |LOCK OF |SAVE:"..|
|00000560| 21 f8 07 81 58 b2 31 a4 | 38 3a 99 22 3c 22 aa c4 |!...X.1.|8:."<"..|
|00000570| 28 58 29 aa 22 20 3e 20 | 3d 20 22 aa 43 53 24 28 |(X)." > |= ".CS$(|
|00000580| 58 29 3a 82 00 a3 21 02 | 08 a1 f9 41 24 3a 41 b2 |X):...!.|...A$:A.|
|00000590| c5 28 41 24 29 3a 8b 41 | b3 31 b0 41 b1 39 a7 32 |.(A$):.A|.1.A.9.2|
|000005a0| 30 35 30 00 ca 21 0c 08 | 99 22 11 11 11 11 07 d3 |050..!..|."......|
|000005b0| 45 4c 45 43 54 20 cc c1 | d3 d4 20 42 4c 4f 43 4b |ELECT ..|.. BLOCK|
|000005c0| 20 4f 46 20 53 41 56 45 | 3a 22 00 f0 21 16 08 81 | OF SAVE|:"..!...|
|000005d0| 58 b2 31 a4 38 3a 99 22 | 3c 22 aa c4 28 58 29 aa |X.1.8:."|<"..(X).|
|000005e0| 22 20 3e 20 3d 20 22 aa | 43 53 24 28 58 29 3a 82 |" > = ".|CS$(X):.|
|000005f0| 00 0f 22 20 08 a1 f9 41 | 24 3a 42 b2 c5 28 41 24 |.." ...A|$:B..(A$|
|00000600| 29 3a 8b 42 b3 31 b0 42 | b1 38 a7 32 30 35 30 00 |):.B.1.B|.8.2050.|
|00000610| 20 22 25 08 99 22 d3 41 | 56 49 4e 47 2e 2e 2e 22 | "%..".A|VING..."|
|00000620| 00 4c 22 2a 08 fe 10 28 | 46 49 24 29 2c 42 31 2c |.L"*...(|FI$),B1,|
|00000630| 50 28 41 41 28 41 29 29 | a4 50 28 41 41 28 42 aa |P(AA(A))|.P(AA(B.|
|00000640| 31 29 29 3a 8b 44 53 a7 | 99 44 53 24 00 55 22 33 |1)):.DS.|.DS$.U"3|
|00000650| 08 89 31 30 30 00 72 22 | b8 0b 99 22 93 9c d5 53 |..100.r"|..."...S|
|00000660| 45 20 41 20 43 48 41 52 | 41 43 54 45 52 20 53 45 |E A CHAR|ACTER SE|
|00000670| 54 3a 00 a2 22 c2 0b 99 | 22 11 11 11 11 9e ce cf |T:.."...|".......|
|00000680| d4 c5 3a 9f 20 d4 48 45 | 52 45 20 4d 55 53 54 20 |..:. .HE|RE MUST |
|00000690| 42 45 20 41 20 43 48 41 | 52 41 43 54 45 52 20 53 |BE A CHA|RACTER S|
|000006a0| 45 54 00 c4 22 cc 0b 99 | 22 49 4e 20 4d 45 4d 4f |ET.."...|"IN MEMO|
|000006b0| 52 59 20 2c 20 4f 52 20 | 59 4f 55 20 57 49 4c 4c |RY , OR |YOU WILL|
|000006c0| 20 47 45 54 00 e2 22 d6 | 0b 99 22 47 41 52 42 41 | GET..".|.."GARBA|
|000006d0| 47 45 20 4f 4e 20 54 48 | 45 20 53 43 52 45 45 4e |GE ON TH|E SCREEN|
|000006e0| 21 22 00 04 23 e0 0b 99 | 22 11 11 05 c8 49 54 20 |!"..#...|"....IT |
|000006f0| 41 4e 59 20 4b 45 59 20 | 54 4f 20 43 4f 4e 54 49 |ANY KEY |TO CONTI|
|00000700| 4e 55 45 22 00 20 23 ea | 0b 99 22 12 96 3c 41 3e |NUE". #.|.."..<A>|
|00000710| 20 41 42 4f 52 54 53 20 | 54 4f 20 4d 45 4e 55 22 | ABORTS |TO MENU"|
|00000720| 00 3c 23 f4 0b a1 f9 41 | 24 3a 8b 41 24 b2 22 41 |.<#....A|$:.A$."A|
|00000730| 22 b0 41 24 b2 22 c1 22 | a7 31 30 30 00 6c 23 1c |".A$."."|.100.l#.|
|00000740| 0c 8c 33 31 32 30 3a 81 | 49 b2 30 a4 d1 28 22 32 |..3120:.|I.0..("2|
|00000750| 42 22 29 3a 87 58 24 3a | 97 d1 28 22 30 32 30 30 |B"):.X$:|..("0200|
|00000760| 22 29 aa 49 2c d1 28 58 | 24 29 3a 82 00 80 23 26 |").I,.(X|$):...#&|
|00000770| 0c fe 02 31 35 3a 9e d1 | 28 22 30 32 30 30 22 29 |...15:..|("0200")|
|00000780| 00 bc 23 30 0c 83 20 41 | 39 2c 32 30 2c 38 44 2c |..#0.. A|9,20,8D,|
|00000790| 41 32 2c 30 32 2c 41 39 | 2c 32 32 2c 38 44 2c 41 |A2,02,A9|,22,8D,A|
|000007a0| 33 2c 30 32 2c 41 39 2c | 30 32 2c 38 44 2c 41 34 |3,02,A9,|02,8D,A4|
|000007b0| 2c 30 32 2c 32 30 2c 36 | 32 2c 46 46 00 f2 23 3a |,02,20,6|2,FF..#:|
|000007c0| 0c 83 20 41 39 2c 41 44 | 2c 38 44 2c 41 32 2c 30 |.. A9,AD|,8D,A2,0|
|000007d0| 32 2c 41 39 2c 30 30 2c | 38 44 2c 41 33 2c 30 32 |2,A9,00,|8D,A3,02|
|000007e0| 2c 41 39 2c 46 46 2c 38 | 44 2c 41 34 2c 30 32 2c |,A9,FF,8|D,A4,02,|
|000007f0| 36 30 00 16 24 44 0c 83 | 20 41 32 2c 30 31 2c 42 |60..$D..| A2,01,B|
|00000800| 44 2c 46 30 2c 46 37 2c | 41 41 2c 41 44 2c 30 30 |D,F0,F7,|AA,AD,00|
|00000810| 2c 46 46 2c 36 30 00 1f | 24 4e 0c 89 31 30 30 00 |,FF,60..|$N..100.|
|00000820| 34 24 a0 0f fe 02 31 35 | 3a 9e 36 35 33 37 38 3a |4$....15|:.65378:|
|00000830| 89 31 30 30 00 75 24 88 | 13 99 22 93 9f 20 20 20 |.100.u$.|..".. |
|00000840| 20 20 c4 49 53 4b 20 c4 | 49 52 45 43 54 4f 52 59 | .ISK .|IRECTORY|
|00000850| 22 3a 99 22 05 d5 53 45 | 20 96 5b 9e ce 4f 20 d3 |":."..SE| .[..O .|
|00000860| 43 52 4f 4c 4c 96 5d 05 | 20 54 4f 20 50 41 55 53 |CROLL.].| TO PAUS|
|00000870| 45 11 11 9b 22 00 7b 24 | 92 13 ee 00 a1 24 97 13 |E...".{$|.....$..|
|00000880| 99 3a 99 22 12 9f 07 d0 | 52 45 53 53 20 41 4e 59 |.:."....|RESS ANY|
|00000890| 20 4b 45 59 20 54 4f 20 | 43 4f 4e 54 49 4e 55 45 | KEY TO |CONTINUE|
|000008a0| 22 00 af 24 9c 13 a1 f9 | 41 24 3a 89 31 30 30 00 |"..$....|A$:.100.|
|000008b0| 00 00 | |.. | |
+--------+-------------------------+-------------------------+--------+--------+